home *** CD-ROM | disk | FTP | other *** search
/ Computer Life: SuperPac / SuperPac (Computer Life Magazine)(Ziff-Davis)(1995).ISO / pc / demos / tracker / disk1 / trkmerge.sm_ / trkmerge.sm
Encoding:
INI File  |  1995-03-29  |  4.8 KB  |  526 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     
  5. [files]
  6. [charset]
  7.     82
  8.     ANSI (Windows, IBM CP 1252)
  9. [revisions]
  10.     0
  11. [prn]
  12.     TI microLaser Pro 600\pcl5
  13. [port]
  14.     LPT1:
  15. [lang]
  16.     18
  17. [desc]
  18.     
  19.     
  20.     
  21.     
  22.     
  23.     793907675
  24.     21
  25.     759441762
  26.     223
  27.     2
  28.     0
  29.     0
  30.     0
  31.     0
  32.     
  33.     
  34.     
  35.     
  36.     
  37.     
  38.     1
  39. [fopts]
  40.     0
  41.     1
  42.     0
  43.     0
  44. [lnopts]
  45.     2
  46.     Body Text
  47.     1
  48. [docopts]
  49.     5
  50.     2
  51. [GramStyle]
  52.     
  53. [tag]
  54.     Body Text
  55.     2
  56.     [fnt]
  57.         Arial
  58.         240
  59.         0
  60.         16384
  61.     [algn]
  62.         1
  63.         2
  64.         215
  65.         0
  66.         0
  67.     [spc]
  68.         33
  69.         272
  70.         2
  71.         0
  72.         0
  73.         2
  74.         100
  75.     [brk]
  76.         4
  77.     [line]
  78.         8
  79.         0
  80.         2
  81.         0
  82.         1
  83.         1
  84.         1
  85.         10
  86.         10
  87.         1
  88.     [spec]
  89.         0
  90.         0
  91.         
  92.         0
  93.         2
  94.         1
  95.         0
  96.         16
  97.         0
  98.         0
  99.     [nfmt]
  100.         272
  101.         1
  102.         3
  103.         .
  104.         ,
  105.         $
  106.     Body Text
  107.     0
  108.     0
  109. [tag]
  110.     Body Single
  111.     3
  112.     [fnt]
  113.         Times New Roman
  114.         240
  115.         0
  116.         49152
  117.     [algn]
  118.         1
  119.         2
  120.         0
  121.         0
  122.         0
  123.     [spc]
  124.         33
  125.         272
  126.         2
  127.         0
  128.         0
  129.         2
  130.         100
  131.     [brk]
  132.         4
  133.     [line]
  134.         8
  135.         0
  136.         2
  137.         0
  138.         1
  139.         1
  140.         1
  141.         10
  142.         10
  143.         1
  144.     [spec]
  145.         0
  146.         0
  147.         
  148.         0
  149.         2
  150.         1
  151.         0
  152.         0
  153.         0
  154.         0
  155.     [nfmt]
  156.         280
  157.         1
  158.         2
  159.         .
  160.         ,
  161.         $
  162.     Body Single
  163.     0
  164.     0
  165. [tag]
  166.     Function
  167.     4
  168.     [fnt]
  169.         Arial
  170.         240
  171.         0
  172.         16385
  173.     [algn]
  174.         1
  175.         2
  176.         0
  177.         0
  178.         0
  179.     [spc]
  180.         33
  181.         272
  182.         2
  183.         0
  184.         0
  185.         2
  186.         100
  187.     [brk]
  188.         68
  189.     [line]
  190.         8
  191.         0
  192.         2
  193.         0
  194.         1
  195.         1
  196.         1
  197.         10
  198.         10
  199.         1
  200.     [spec]
  201.         0
  202.         1
  203.         
  204.         0
  205.         2
  206.         1
  207.         0
  208.         0
  209.         0
  210.         0
  211.     [nfmt]
  212.         272
  213.         1
  214.         3
  215.         .
  216.         ,
  217.         $
  218.     Body Text
  219.     0
  220.     0
  221. [lay]
  222.     Standard
  223.     516
  224.     [rght]
  225.         16834
  226.         11907
  227.         2
  228.         1440
  229.         1440
  230.         2
  231.         1440
  232.         1440
  233.         0
  234.         1
  235.         0
  236.         1
  237.         0
  238.         2
  239.         1
  240.         1440
  241.         10465
  242.         12
  243.         1
  244.         720
  245.         1
  246.         1440
  247.         1
  248.         2160
  249.         1
  250.         2880
  251.         1
  252.         3600
  253.         1
  254.         4320
  255.         1
  256.         5040
  257.         1
  258.         5760
  259.         1
  260.         6480
  261.         1
  262.         7200
  263.         1
  264.         7920
  265.         1
  266.         8640
  267.     [hrght]
  268.     [lyfrm]
  269.         1
  270.         11200
  271.         0
  272.         0
  273.         11907
  274.         1440
  275.         0
  276.         1
  277.         3
  278.         1 0 0 0 0 0 0
  279.         0
  280.         0
  281.         1
  282.     [frmlay]
  283.         1440
  284.         11907
  285.         1
  286.         1440
  287.         73
  288.         2
  289.         793
  290.         1440
  291.         0
  292.         1
  293.         0
  294.         1
  295.         1
  296.         0
  297.         1
  298.         1440
  299.         10465
  300.         1
  301.         3
  302.         9360
  303.     [txt]
  304. >
  305.     [frght]
  306.     [lyfrm]
  307.         1
  308.         13248
  309.         0
  310.         15394
  311.         11907
  312.         16834
  313.         0
  314.         1
  315.         3
  316.         1 0 0 0 0 0 0
  317.         0
  318.         0
  319.         2
  320.     [frmlay]
  321.         16834
  322.         11907
  323.         1
  324.         1440
  325.         793
  326.         2
  327.         15467
  328.         1440
  329.         0
  330.         1
  331.         0
  332.         1
  333.         1
  334.         0
  335.         1
  336.         1440
  337.         10465
  338.         2
  339.         2
  340.         4680
  341.         3
  342.         9360
  343.     [txt]
  344. >
  345. [elay]
  346. [l1]
  347.     0
  348. [pg]
  349.     2
  350.     49 0 16 0 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  351.     54 0 0 1025 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  352. [edoc]
  353. <:#284,9025>DECLARE WaitDDE(ddecon)
  354.  
  355. <:#284,9025>DECLARE WaitExportDDE(ddeexp)
  356.  
  357. <:#284,9025>
  358.  
  359. <:#284,9025>
  360.  
  361. <:#284,9025>Function TrackerMergePrint()
  362.  
  363. <:#284,9025>
  364.  
  365. <:#284,9025>' Establish DDE connections
  366.  
  367. <:#284,9025>
  368.  
  369. <:#284,9025>ddecon=DDEInitiate("TCONTACT","TRKINFO")
  370.  
  371. <:#284,9025>ddesys=DDEInitiate("TCONTACT","SYSTEM")
  372.  
  373. <:#284,9025>ddeexp=DDEInitiate("TCONTACT","EXPORT")
  374.  
  375. <:#284,9025>
  376.  
  377. <:#284,9025>' Export Tracker Version 2 data
  378.  
  379. <:#284,9025>
  380.  
  381. <:#284,9025>docs=GetDocPath$()
  382.  
  383. <:#284,9025>DDEExecute(ddesys, "Export(tie_ascd,allflds,{docs}tracker.dat)")
  384.  
  385. <:#284,9025>WaitDDE(ddecon)
  386.  
  387. <:#284,9025>WaitExportDDE(ddeexp)
  388.  
  389. <:#284,9025>
  390.  
  391. <:#284,9025>' Terminate DDE connections
  392.  
  393. <:#284,9025>
  394.  
  395. <:#284,9025>DDETerminate(ddecon)
  396.  
  397. <:#284,9025>DDETerminate(ddesys)
  398.  
  399. <:#284,9025>DDETerminate(ddeexp)
  400.  
  401. <:#284,9025>
  402.  
  403. <:#284,9025>' Merge with the data file
  404.  
  405. <:#284,9025>
  406.  
  407. <:#284,9025>LayoutMode()
  408.  
  409. <:#284,9025>SetDataFile("{docs}tracker.dat"  0 "{docs}trkdesc.sam"  0  )
  410.  
  411. <:#284,9025>Merge(8 "{docs}tracker.dat"  "{docs}trkdesc.sam"   )
  412.  
  413. <:#284,9025>FileChanged(1,0)
  414.  
  415. <:#284,9025>
  416.  
  417. <:#284,9025>End function
  418.  
  419. <:#284,9025>
  420.  
  421. <:#284,9025>
  422.  
  423. <:#284,9025>Function WaitDDE(ddecon)
  424.  
  425. <:#284,9025>
  426.  
  427. <:#284,9025>a="Busy"
  428.  
  429. <:#284,9025>while (a="Busy")
  430.  
  431. <:#284,9025>    a=DDEReceive$(ddecon, "status")
  432.  
  433. <:#284,9025>wend
  434.  
  435. <:#284,9025>
  436.  
  437. <:#284,9025>End function
  438.  
  439. <:#284,9025>
  440.  
  441. <:#284,9025>
  442.  
  443. <:#284,9025>Function WaitExportDDE(ddeexp)
  444.  
  445. <:#284,9025>
  446.  
  447. <:#284,9025>a="busy"
  448.  
  449. <:#284,9025>while (a="busy")
  450.  
  451. <:#284,9025>    a=DDEReceive$(ddeexp, "status")
  452.  
  453. <:#284,9025>wend
  454.  
  455. <:#284,9025>
  456.  
  457. <:#284,9025>End function
  458.  
  459. <:#284,9025>
  460.  
  461. >
  462.  
  463. [Embedded]
  464. 00004135
  465. >
  466. [macsum] 3
  467. TrackerMergePrint 0 0 5 4
  468. WaitDDE 393 1 2 35
  469. WaitExportDDE 509 1 2 45
  470. [macse]
  471. 14 TrackerMergePrint
  472. 0 8 "TCONTACT" "TRKINFO"
  473. 13
  474. 8 1
  475. 0 8 "TCONTACT" "SYSTEM"
  476. 13
  477. 8 2
  478. 0 8 "TCONTACT" "EXPORT"
  479. 13
  480. 8 3
  481. 0 268
  482. 13
  483. 8 4
  484. 0 11 "{2}" "Export(tie_ascd,allflds,{4}tracker.dat)"
  485. 16 WaitDDE "{1}"
  486. 16 WaitExportDDE "{3}"
  487. 0 9 "{1}"
  488. 0 9 "{2}"
  489. 0 9 "{3}"
  490. 2 210 1
  491. 2 566 1 "{4}tracker.dat" 0 "{4}trkdesc.sam" 0
  492. 2 110 1 8 "{4}tracker.dat" "{4}trkdesc.sam"
  493. 0 34 1 0
  494. 6 0
  495. 15
  496. 9
  497. 14 WaitDDE
  498. 7 "Busy"
  499. 8 2
  500. 6 2
  501. 7 "Busy"
  502. 18 0
  503. 11 00000104
  504. 0 10 "{0}" "status"
  505. 13
  506. 8 2
  507. 10 00000027
  508. 6 1
  509. 15
  510. 9
  511. 14 WaitExportDDE
  512. 7 "busy"
  513. 8 2
  514. 6 2
  515. 7 "busy"
  516. 18 0
  517. 11 00000110
  518. 0 10 "{0}" "status"
  519. 13
  520. 8 2
  521. 10 00000033
  522. 6 1
  523. 15
  524. 9
  525. 00004160
  526.